<script>on mouseUpsend mouseUp to bg btn "calculate"end mouseUp</script>
</part>
<part>
<id>195</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>186</left>
<top>103</top>
<right>274</right>
<bottom>117</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Hobo</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>ckclr</name>
<script></script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>55</left>
<top>10</top>
<right>251</right>
<bottom>70</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>EstroFont</font>
<textSize>18</textSize>
<textStyle>shadow</textStyle>
<textHeight>26</textHeight>
<name>Address</name>
<script></script>
</part>
<part>
<id>71</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>0</left>
<top>10</top>
<right>29</right>
<bottom>41</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>21700</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Home</name>
<script>on mouseUpgo to card id 3916 of stack "Home"end mouseUp</script>
</part>
<part>
<id>139</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>51</left>
<top>103</top>
<right>103</right>
<bottom>122</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Hobo</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>DateField</name>
<script></script>
</part>
<part>
<id>162</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>4</left>
<top>120</top>
<right>67</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>condense</textStyle>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>CK#</name>
<script>on mouseUpget the value of the clickLineanswer "Would you like to edit this Check number or insert an entry?" &¬" (New entries are inserted AFTER the clicked line)" with "Cancel" or "Insert" or "Edit Ck#"if it is "Cancel" then exit mouseUpif it is "Edit Ck#" thenask "Please enter the new check number" & return &¬" —including '#' sign." with the value of the clickLineif it is empty then exit mouseUpelse put it into the clickLineelseput word 2 of the clickLine into nmbrask "Enter the item for the Check# Field."if it is empty then exit mouseUpelse put it into CkHoldask "Enter a description for the inserted line."if it is empty then exit mouseUpelse put it into descHoldanswer "Are you inserting a Debit or a Credit?" with "Debit" or "Credit" or "Cancel"if it is "Cancel" then exit mouseUpset numberFormat to "0.00"if it is "Debit" thenask "Enter the debit amount."if it is empty then exit mouseUpelseput return & (it *1) after line(nmbr) of fld "debit"put return after line(nmbr) of fld "credit"end ifelseask "Enter the credit amount"if it is empty then exit mouseUpelseput return & (it *1) after line(nmbr) of fld "credit"put return after line(nmbr) of fld "debit"end ifend ifput return & CkHold after line(nmbr) of fld "CK#"put return & the date after line(nmbr) of fld "date"put return & descHold after line(nmbr) of fld "describe"put return & "–" after line(nmbr) of fld "ck cleared"reCalculateend ifend mouseUp</script>
</part>
<part>
<id>141</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>51</left>
<top>120</top>
<right>119</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>condense</textStyle>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>date</name>
<script>on mouseUpanswer "Would you like to change the date?" with "Well, Sure!" or "Skip It!"if it is "Well, Sure!" thenask "Please enter a new date." with the value of the clickLineif it is empty thenexit mouseUpelse put it into the clickLinehide msgelseif it is empty then exit mouseUpend ifend mouseUp</script>
</part>
<part>
<id>142</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>103</left>
<top>120</top>
<right>266</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>describe</name>
<script>on mouseUpanswer "Would you like to edit this description?" with "No" or "Yes!"if it is "Yes!" thenask "Please enter your new description." with the value of the clickLineif it is empty thenexit mouseUpelse put it into the clickLinehide msgelseif it is empty then exit mouseUpend ifend mouseUp</script>
</part>
<part>
<id>149</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>328</left>
<top>103</top>
<right>407</right>
<bottom>121</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Hobo</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Cred</name>
<script></script>
</part>
<part>
<id>150</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>409</left>
<top>103</top>
<right>504</right>
<bottom>122</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Hobo</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Balance</name>
<script></script>
</part>
<part>
<id>158</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>255</left>
<top>56</top>
<right>342</right>
<bottom>75</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Eras Ultra</font>
<textSize>14</textSize>
<textStyle>underline</textStyle>
<textStyle>italic</textStyle>
<textStyle>bold</textStyle>
<name>Calculate</name>
<script>on mouseDownset hilite of bg btn 1 to trueend mouseDownon mouseUpset hilite of bg btn 1 to falsecalculateend mouseUp</script>
</part>
<part>
<id>191</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>233</left>
<top>120</top>
<right>266</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>Ck cleared</name>
<script>on MouseUpif the value of the clickline is in "–" thenput "X" into the clicklineelseput "–" into the clicklineend ifend mouseUp</script>
</part>
<part>
<id>166</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>250</left>
<top>120</top>
<right>344</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>debit</name>
<script>on mouseUpget the value of the clickLineput (word 2 of the clickLine) into nmbrif it is empty and line(nmbr) of fld "credit" is empty thenanswer "There is not a ‘Debit’ or a ‘Credit’ on this line." & return &¬"Would you like a ‘Debit’ on this line?" with "Yes" or "Cancel"if it is "Cancel" thenexit mouseUpelseif it is "Yes" thenask "Please enter the amount of the ‘Debit’."if it is empty thenexit mouseUpelseput it into the clicklineexit mouseUpend ifend ifend ifelseif it is empty and line(nmbr) of fld "credit" is not empty thenanswer "There is already a ‘Credit’ on this line." & return &¬"Should it be listed as a ‘Debit’?" with "Yes" or "Cancel"if it is "Yes" thenput line(nmbr) of fld "credit" into the clicklineput empty into line(nmbr) of fld "credit"put "You’ll have to click ‘Re–Calculate’ to update your balance!"wait 2 secshide msg boxexit mouseUpelseexit mouseUpend ifend ifend ifanswer "Would you like to edit this figure?" with "Yes" or "Delete Line" or "Cancel"if it is empty then exit mouseUpif it is "Yes" thenask "Please enter a new figure. (You'll need to " &¬"click ‘Re–Calculate’ to update your balance!)" with the value of the clickLineif it is empty then exit mouseUpelse put it into the clickLineelseif it is "Delete Line" thenanswer "Delete the contents of this line in ALL columns?" with¬"Go Ahead" or "Cancel"if it is "Go Ahead" thenput (word 2 of the clickLine) into nmbrdelete line(nmbr) of fld "date"delete line(nmbr) of fld "describe"delete line(nmbr) of fld "CK#"delete line(nmbr) of fld "debit"delete line(nmbr) of fld "credit"delete line(nmbr) of fld "new bal"delete line(nmbr) of fld "ck cleared"put "You’ll have to click ‘Re–Calculate’ to update your balance!"wait 2 secshide msgend ifend ifend ifend mouseUp</script>
</part>
<part>
<id>167</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>328</left>
<top>120</top>
<right>423</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>credit</name>
<script>on mouseUpget the value of the clickLineput (word 2 of the clickLine) into nmbrif it is empty and line(nmbr) of fld "debit" is empty thenanswer "There is not a ‘Debit’ or a ‘Credit’ on this line." & return &¬"Would you like a ‘Credit’ on this line?" with "Yes" or "Cancel"if it is "Cancel" thenexit mouseUpelseif it is "Yes" thenask "Please enter the amount of the ‘Credit’."if it is empty thenexit mouseUpelseput it into the clicklineexit mouseUpend ifend ifend ifelseif it is empty and line(nmbr) of fld "debit" is not empty thenanswer "There is already a ‘Debit’ on this line." & return &¬"Is it supposed to be listed as a ‘Credit’?" with "Yes" or "No"if it is "Yes" thenput line(nmbr) of fld "debit" into the clicklineput empty into line(nmbr) of fld "debit"put "You’ll need to click ‘Re–Calculate’ to update your balance!"wait 2 secshide msg boxexit mouseUpelseexit mouseUpend ifend ifend ifanswer "Would you like to edit this figure?" with "Yes" or "Delete Line" or "Cancel"if it is empty then exit mouseUpif it is "Yes" thenask "Please enter a new figure. (You'll need to " &¬"click ‘Re–Calculate’" &return& "to update your balance!)" with the value of the clickLineif it is empty then exit mouseUpelse put it into the clickLineelseif it is "Delete Line" thenanswer "Delete the contents of this line in ALL columns?" with¬"Go Ahead" or "Cancel"if it is "Go Ahead" thenput word 2 of the clickLine into nmbrdelete line(nmbr) of fld "date"delete line(nmbr) of fld "describe"delete line(nmbr) of fld "CK#"delete line(nmbr) of fld "debit"delete line(nmbr) of fld "credit"delete line(nmbr) of fld "new bal"delete line(nmbr) of fld "ck cleared"put "You’ll have to click ‘Re–Calculate’ to update your balance!"wait 2 secshide msgend ifend ifend ifend mouseUp</script>
</part>
<part>
<id>168</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>407</left>
<top>120</top>
<right>505</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>new bal</name>
<script></script>
</part>
<part>
<id>177</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>29</left>
<top>104</top>
<right>46</right>
<bottom>119</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ckNum</name>
<script></script>
</part>
<part>
<id>181</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>348</left>
<top>43</top>
<right>389</right>
<bottom>80</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>22100</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Search</name>
<script>on mouseUpfindItend mouseUp</script>
</part>
<part>
<id>183</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>399</left>
<top>26</top>
<right>512</right>
<bottom>43</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Hide Search Results</name>
<script>on mouseUpput empty into fld "searchResults"hide fld "searchResults"hide meend mouseUp</script>
</part>
<part>
<id>165</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>4</left>
<top>77</top>
<right>51</right>
<bottom>95</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>condense</textStyle>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>holdCk</name>
<script>on openFieldif target is empty thenput the value of fld "c#saver" into meselect word 1 of meelseselect word 1 of meend ifend openField</script>
</part>
<part>
<id>151</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>77</top>
<right>103</right>
<bottom>95</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>condense</textStyle>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>holdDate</name>
<script>on openFieldif target is empty thenput the date into meif char 2 of me is in "/" and char 4 of me is in "/" then select char 3 of meif char 2 of me is in "/" and char 5 of me is in "/" then select char 3 to 4 of meif char 3 of me is in "/" and char 5 of me is in "/" then select char 4 of meif char 3 of me is in "/" and char 6 of me is in "/" then select char 4 to 5 of meelseend ifend ifend openField</script>
</part>
<part>
<id>152</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>103</left>
<top>77</top>
<right>250</right>
<bottom>95</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>holdDesc</name>
<script></script>
</part>
<part>
<id>153</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>250</left>
<top>77</top>
<right>328</right>
<bottom>95</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>holdDebit</name>
<script></script>
</part>
<part>
<id>154</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>328</left>
<top>77</top>
<right>407</right>
<bottom>95</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>holdCredit</name>
<script></script>
</part>
<part>
<id>190</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>340</left>
<top>0</top>
<right>397</right>
<bottom>45</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>11349</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Clear Fields</name>
<script>on mouseUpanswer "Are you SURE you want to CLEAR ALL FIELDS??" with "OK" or "CANCEL"if it is "cancel" thenexit mouseUpelseput empty into fld "CK#"put empty into fld "date"put empty into fld "describe"put empty into fld "debit"put empty into fld "credit"put empty into fld "new bal"doMenu "Compact Stack"end ifend mouseUp</script>
</part>
<part>
<id>171</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>95</left>
<top>39</top>
<right>372</right>
<bottom>269</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>BI Souvenir DemiItalic</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>acctBack</name>
<script></script>
</part>
<part>
<id>182</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>55</left>
<top>10</top>
<right>351</right>
<bottom>104</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>searchResults</name>
<script>on mouseUpput last word of (value of the clickLine) into tempset scroll of fld "new bal" to ((temp-1)*16)end mouseUp</script>
</part>
<part>
<id>170</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>399</left>
<top>42</top>
<right>512</right>
<bottom>59</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<name>Show Delimiter List</name>
<script>on mouseUplock screenset the visible of fld "acctNmbrs" to not the visible¬of fld "acctNmbrs"set the visible of fld "acctDels" to not the visible¬of fld "acctDels"set the visible of fld "acctBack" to not the visible¬of fld "acctBack"set the visible of bkgnd btn "Add Delimiter" to not the visible¬of bkgnd btn "Add Delimiter"if the visible of fld acctNmbrs = true thenset name of me to "Hide Delimiter List"elseset name of me to "Show Delimiter List"end ifend mouseUp</script>
</part>
<part>
<id>169</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>399</left>
<top>58</top>
<right>512</right>
<bottom>77</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Eras Ultra</font>
<textSize>13</textSize>
<textStyle>underline</textStyle>
<textStyle>italic</textStyle>
<textStyle>bold</textStyle>
<name>Re-Calculate</name>
<script>on mouseUpreCalculateend mouseUp</script>
</part>
<part>
<id>201</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>205</left>
<top>104</top>
<right>217</right>
<bottom>119</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ckNum</name>
<script></script>
</part>
<part>
<id>179</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>96</left>
<top>40</top>
<right>288</right>
<bottom>268</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>acctNmbrs</name>
<script></script>
</part>
<part>
<id>172</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>182</left>
<top>39</top>
<right>284</right>
<bottom>56</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Add Delimiter</name>
<script>on mouseUpif the number of lines in fld "acctNmbrs" =0 thenput "2" into porkelseput number of lines in field "acctNmbrs" +1 into porkend ifask "Please enter the ‘Description’ to be delimited."if it is empty then exit mouseUpput it into actNameask "Please enter a ‘Delimiter’ (see ‘Help’)."if it is empty then exit mouseUpput it into actNmbrput actName into line pork of field "acctNmbrs"put actNmbr into line pork of field "acctDels"if the number of lines in fld "acctNmbrs" <3 then exit mouseUpput fastSort(field "acctnmbrs") into fld "acctnmbrs"set the lockText of fld "acctnmbrs" to falseset the lockText of fld "acctdels" to falseend mouseUp</script>
</part>
<part>
<id>186</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>460</left>
<top>76</top>
<right>481</right>
<bottom>108</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>8349</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpgo to prev cardend mouseUp</script>
</part>
<part>
<id>187</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>483</left>
<top>80</top>
<right>500</right>
<bottom>105</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>8350</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpvisual effect shrink to center very fastgo to next cardend mouseUp</script>
</part>
<part>
<id>188</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>9</left>
<top>42</top>
<right>48</right>
<bottom>78</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>6720</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpget the visible of fld "help"if it is true thenhide fld "help"set icon of me to 6720elseshow fld "help"set icon of me to 21444end ifend mouseUp</script>
</part>
<part>
<id>193</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>460</left>
<top>76</top>
<right>481</right>
<bottom>108</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>8349</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpvisual effect stretch from center very fastgo to prev cardend mouseUp</script>
</part>
<part>
<id>189</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>4</left>
<top>77</top>
<right>506</right>
<bottom>342</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>14</textHeight>
<name>Help</name>
<script></script>
</part>
<part>
<id>178</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>287</left>
<top>40</top>
<right>371</right>
<bottom>268</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>acctDels</name>
<script></script>
</part>
<part>
<id>196</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>251</left>
<top>42</top>
<right>468</right>
<bottom>189</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>Deps/NC</name>
<script></script>
</part>
<part>
<id>197</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>42</top>
<right>251</right>
<bottom>189</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>Checks/NC</name>
<script></script>
</part>
<part>
<id>198</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>399</left>
<top>9</top>
<right>512</right>
<bottom>27</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Balance</name>
<script>on mouseUpset numberformat to "0.00"put empty into line 2 to 100 of fld "checks/nc"put empty into line 2 to 100 of fld "deps/nc"put empty into line 2 to 10 of fld "balres"show fld "Checks/nc"show fld "deps/nc"show fld "balres"show bg btn "Hide Balance"put "0.00" into checkHoldput "0.00" into depHoldput "0.00" into depHoldNewput "0.00" into balanceHoldput 0 into scrollHoldrepeat with x=1 to the number of lines in fld "new bal"set cursor to busyif line x of fld "ck cleared" is in "X" thennext repeatelseif line x of fld "debit" is empty and line x of fld "credit"¬is empty thenput line x of fld "ck#" && "Void" & return after fld "checks/nc"next repeatend ifif line x of fld "debit" is empty thenput line x of fld "date" &&¬char 1 to 15 of line x of fld "describe" &&¬line x of fld "credit" & return after fld "deps/nc"put line x of fld "credit" into nmbr1put (depHold + nmbr1) into depHoldput (scroll of fld "deps/nc" + 16) into scrollHoldset scroll of fld "deps/nc" to scrollholdnext repeatelseput line x of fld "ck#" &&¬char 1 to 15 of line x of fld "describe" &&¬line x of fld "debit" & return after fld "checks/nc"put line x of fld "debit" into nmbr2put (checkHold + nmbr2) into checkHoldput (scroll of fld "checks/nc" + 16) into scrollHoldset scroll of fld "checks/nc" to scrollholdend ifend ifend repeatput "____________________________" & return after fld "checks/nc"put "____________________________" & return after fld "deps/nc"put "Checks Outstanding:" && checkHold & return after fld "checks/nc"put "Deposits Outstanding:" && depHold & return after fld "deps/nc"set scroll of fld "checks/nc" to (scrollhold + 32)set scroll of fld "deps/nc" to (scrollhold + 32)beepask "Please enter the ending balance on this statement."if it is empty thenbeepexit mouseUpelseput it into balanceHoldanswer "You entered “$" & balanceHold & "”. Is this correct?" with "Cancel" or "No" or "Yes"if it is "Cancel" thenexit mouseUpelseif it is "No" thenask "Please enter the ending balance on this statement."if it is empty then exit mouseUpput it into balanceHoldend ifput "Uncleared Deposits: " && depHold into line 2 of fld "balres"put "Stmt. Ending Balance:" && balanceHold into line 3 of fld "balres"put the value of (last word of line 2 of fld "balres") into temp1put the value of (last word of line 3 of fld "balres") into temp2put (temp1 + temp2) into depHoldNewput "Adjusted Balance: " && depHoldNew into line 4 of fld "balres"put "Checks Outstanding: " && "-" &checkHold into line 5 of fld "balres"put "______________________________" into line 6 of fld "balres"put "New Balance: " && (depHoldNew - checkHold) into line 7 of fld "balres"put "Checkbook Balance: " && (last line of fld "new bal") into line 8 of fld "balres"put the value of (last word of line 7 of fld "balres") into temp3put the value of (last word of line 8 of fld "balres") into temp4if the value of temp3 ≠ the value of temp4 thenput (temp3 - temp4) into holderput "The difference is: " && holder into line 9 of fld "balres"elseput "Your checkbook is RIGHT ON!" into line 9 of fld "balres"end ifend ifend ifbeep 2end mouseUp</script>
</part>
<part>
<id>200</id>
<type>button</type>
<visible> <false /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>399</left>
<top>26</top>
<right>512</right>
<bottom>43</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Hide Balance</name>
<script>on mouseUpif line 2 of fld "checks/nc" is not empty thenanswer "Would you like to save the ‘Balance Results’?" with "Yes" or "No"if it is "No" thenhide fld "checks/nc"hide fld "deps/nc"hide fld "balres"hide mehide msgexit mouseUpelseput "One moment while I create a card and store the results there."lock screenpush cdgo to last cd of bg "Balance Results"domenu "New Card"Put "Balance Results from " & the date into line 1 of fld "ResHold"put (fld "checks/nc" of first cd of bg "budget") & return after fld "resHold"put (fld "deps/nc" of first cd of bg "budget") & return after fld "resHold"put (fld "balres" of first cd of bg "budget") & return after fld "resHold"pop cdunlock screenhide fld "checks/nc"hide fld "deps/nc"hide fld "balres"hide meHIDE MSGend ifelsehide fld "checks/nc"hide fld "deps/nc"hide fld "balres"hide mehide msgend ifend mouseUp</script>
</part>
<part>
<id>202</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>146</left>
<top>188</top>
<right>363</right>
<bottom>338</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>D Peignot Demi</font>
<textSize>12</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name>BalRes</name>
<script></script>
</part>
<part>
<id>203</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>28</left>
<top>10</top>
<right>57</right>
<bottom>41</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>4313</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Home</name>
<script>on mouseUpanswer "Do you want to Quit HyperCard or just close this stack?" with ¬"Quit" or "Home" or "Cancel"if it is "Cancel" thenexit mouseUpelseif it is "Quit" thendomenu "Quit HyperCard"elsego to card id 3916 of stack "Home"end ifend ifend mouseUp</script>
</part>
<name>Budget</name>
<script>on openCardput field 1 of card "First Card" into field 1 of this cardput field "acctNmbrs" of card "First Card" into field¬"acctNmbrs" of this cardput field "DateField" of card "First Card" into¬field "DateField" of this cardput field "Description" of card "First Card" into¬field "Description" of this cardput field "ckNum" of card "First Card" into field "ckNum" of this cardput field "Deb" of card "First Card" into field "Deb" of this cardput field "Cred" of card "First Card" into field "Cred" of this cardput field "Balance" of card "First Card" into¬field "Balance" of this cardend openCardon idleset scroll of field "Ck#" to scroll of field "new bal"set scroll of field "date" to scroll of field "new bal"set scroll of field "describe" to scroll of field "new bal"set scroll of field "Ck cleared" to scroll of field "new bal"set scroll of field "debit" to scroll of field "new bal"set scroll of field "credit" to scroll of field "new bal"hide menubarend idleon calculate--Special Thanks to:--Lawrence Churchill for his help in writing this script as well as--the 're-calculate' scriptif fld "holdDate" is empty thenanswer "Type the ‘Tab Key’ to enter your figures to be calculated!"exit calculateend ifset numberFormat to "0.00"lock screenput number of lines in field "new bal" +1 into parkput field "holdDate" into line park of field "date"put field "holdDesc" into line park of field "describe"if word 1 of field "holdCk" is in "div" or¬word 1 of field "holdCk" is in "trans" or¬word 1 of field "holdCk" is in "cash" or¬word 1 of field "holdCk" is in "over" or¬word 1 of field "holdCk" is in "—" thenput field "holdCk" into line park of field "CK#"elseif char 1 of fld "holdCk" is in "1,2,3,4,5,6,7,8,9,0" thenPUT (the value of field "holdck" + 1) into fld "c#Saver"put "#" & field "holdCk" into line park of field "CK#"elseanswer "Put a ‘NUMBER’ in the ‘Ck #’ field, or one of the " &¬"following terms: ‘Div’, ‘Trans’, ‘Cash’, ‘Over’, or " &¬"‘—’ (shift–option–dash)! (You can type the first letter)" with "OK" or "Cancel"if it is "OK" thenexit calculateelseexit calculateend ifend ifend ifif field "holdDebit" is not empty then put (1*field "holdDebit") into line park of field "debit"else put field "holdDebit" into line park of field "debit"if field "holdCredit" is not empty then put (1*field "holdCredit") into line park of field "credit"else put field "holdCredit" into line park of field "credit"if park >1 thenput ((-1* field "holdDebit") + (field "holdCredit")) + line¬park -1 of field "new bal" *1 into line park of field "new bal"elseput ((-1*field "holdDebit") + (field "holdCredit")) *1 into line¬park of field "new bal"end ifput "–" into line park of fld "ck cleared"put empty into field "holdDate"put empty into field "holdDesc"put empty into field "holdCk"put empty into field "holdDebit"put empty into field "holdCredit"end calculateon reCalculateput "This might take a minute. Type 'Command-.' to Cancel"wait 90hide msgset numberFormat to "0.00"put field "debit" into debitCalcput field "credit" into creditCalcput line 1 of creditCalc - line 1 of debitCalc into line 1 of¬field "new bal"put max (number of lines in debitCalc, number of lines in creditCalc)¬into nmbrrepeat with x=2 to nmbrset cursor to busyput line x-1 of field "new bal" +(-1 * line x of debitCalc¬+ line x of creditCalc) & " " into line x of field "new bal"end repeathide msgbeepend reCalculate</script>
